home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / ab20 / ab20_archive / games / strategy / madgic-corewar-4.0.lzh / 1987 / KWC72C.bak < prev    next >
Text File  |  1988-07-09  |  1KB  |  53 lines
  1. ;      KWC72C.S
  2. ;      KENNETH CLAPP
  3. ;
  4.                JMP     START
  5. TOP2           DAT     0
  6.                DAT     0
  7.                DAT     0
  8.                DAT     0
  9.                DAT     0
  10. TOP1           DAT     0
  11. RESTOMP        MOV     ZERO,   @DEST1
  12. STOMP          MOV     <DEST1, <DEST2
  13.                MOV     <DEST1, <DEST2
  14.                MOV     <DEST1, <DEST2
  15.                MOV     <DEST1, <DEST2
  16.                JMZ     STOMP,  @DEST1
  17.                ADD     #9,     DEST1
  18.                ADD     #9,     DEST2
  19.                JMP     RESTOMP
  20. DEST1          DAT     TOP1
  21. DEST2          DAT     TOP2
  22. ZERO           DAT     TOP
  23.                DAT     10
  24.                DAT     325
  25.                SPL     -7
  26.                DAT     4
  27.                DAT     679
  28. TOP            MOV     <ZERO,  #679
  29.                MOV     <ZERO,  DEST
  30.                MOV     <ZERO,  STOP
  31. START          MOV     NUM1,   <DEST
  32.                MOV     NUM2,   <DEST
  33.                ADD     #14,    DEST
  34.                DJN     START,  TOP
  35. STOP           JMP     TOP
  36.                JMP     RESTOMP
  37. NUM1           JMP     -1
  38. NUM2           SPL     -12
  39.                DAT     1
  40.                DAT     1
  41.                DAT     1
  42.                DAT     1
  43.                DAT     1
  44.                DAT     1
  45.                DAT     1
  46.                DAT     1
  47.                DAT     1
  48.                DAT     1
  49.                DAT     1
  50.                DAT     1
  51.                DAT     1
  52.                END
  53.